Kimeruze! Yamikon!/Kimeruze! Yamikon!.iso/mac/YARIKON/EVENT12.Dxr/00032.ls

Text File | 1996-10-23 | 841 b | 36 lines

on enterFrame
  global ayumi, syu, mayu, drink, tired, samasu, hs
  set hs to 0
  set samasu to 1
  puppetSprite(16, 1)
  puppetSprite(17, 1)
  puppetSprite(18, 1)
  puppetSprite(19, 1)
  puppetSprite(20, 1)
  set the castNum of sprite 16 to 238 + ayumi
  set the castNum of sprite 17 to 238 + syu
  set the castNum of sprite 18 to 238 + mayu
  set the castNum of sprite 19 to 249 + drink
  set the castNum of sprite 20 to 249 + tired
  set the visible of sprite 14 to 0
  set the visible of sprite 15 to 0
end

on exitFrame
  global ayumi, syu, mayu, atoi, stoi, mtoi
  if (ayumi >= 6) and (atoi = 0) then
    set atoi to 1
    go("a")
  else
    if (syu >= 6) and (stoi = 0) then
      set stoi to 1
      go("s")
    else
      if (mayu >= 6) and (mtoi = 0) then
        set mtoi to 1
        go("m")
      end if
    end if
  end if
end